home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 July: Mac OS SDK / Dev.CD Jul 96 SDK / Dev.CD Jul 96 SDK1.toast / Development Kits (Disc 1) / OpenDoc Development Framework / Developer University / DUProjects / Finance SOM Library / •SOM / SFinance.cpp next >
Encoding:
C/C++ Source or Header  |  1996-04-01  |  4.1 KB  |  131 lines  |  [TEXT/CWIE]
  1. /*
  2.  *  This file was generated by the SOM Compiler.
  3.  *  Generated using:
  4.  *     SOM incremental update: 2.33
  5.  */
  6.  
  7.  
  8. #define SOM_Module_sfinance_Source
  9. #include <SFinance.xih>
  10.  
  11. #ifndef _FINANCE_
  12.     #include "Finance.h"
  13. #endif
  14.  
  15. //=======================================================================================
  16. SOM_Scope double  SOMLINK 
  17. FINANFutureValue(DevUniv_SFinance *somSelf, Environment *ev,
  18.         double presentValue,
  19.         double annualInterestPercent,
  20.         short compoundsPerYear,
  21.         double years)
  22. {
  23.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANFutureValue");
  24.     return ::FutureValue(presentValue, annualInterestPercent, 
  25.                             compoundsPerYear, years);            // •••
  26. }
  27.  
  28. //---------------------------------------------------------------------------------------
  29. SOM_Scope double  SOMLINK 
  30. FINANFutureValueWithPayments(DevUniv_SFinance *somSelf, Environment *ev,
  31.         double payment,
  32.         short paymentsPerYear,
  33.         short compoundsPerYear,
  34.         double annualInterestPercent,
  35.         double years)
  36. {
  37.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANFutureValueWithPayments");
  38.     return ::FutureValueWithPayments(payment, paymentsPerYear,  compoundsPerYear, 
  39.                                         annualInterestPercent, years); // •••
  40. }
  41.  
  42. //---------------------------------------------------------------------------------------
  43. SOM_Scope double  SOMLINK 
  44. FINANAnnuityPresentValue(DevUniv_SFinance *somSelf, Environment *ev,
  45.         double payment,
  46.         double annualInterestPercent,
  47.         short paymentsPerYear,
  48.         double years)
  49. {
  50.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANAnnuityPresentValue");
  51.     return ::AnnuityPresentValue(payment, annualInterestPercent, 
  52.                                 paymentsPerYear, years);            // •••
  53. }
  54.  
  55. //=======================================================================================
  56. // Loan functions
  57. /*
  58.  *  Loan functions
  59.  */
  60.  
  61. SOM_Scope double  SOMLINK 
  62. FINANAnnuityMonths(DevUniv_SFinance *somSelf, Environment *ev,
  63.         double annuity,
  64.         double monthlyWithdrawal,
  65.         double annualInterestPercent)
  66. {
  67.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANAnnuityMonths");
  68.     return ::AnnuityMonths(annuity, monthlyWithdrawal, annualInterestPercent);     // •••
  69. }
  70.  
  71. //---------------------------------------------------------------------------------------
  72. SOM_Scope double  SOMLINK 
  73. FINANPayment(DevUniv_SFinance *somSelf, Environment *ev,
  74.         double amountBorrowed,
  75.         double annualInterestPercent,
  76.         double years)
  77. {
  78.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANPayment");
  79.     return ::Payment(amountBorrowed, annualInterestPercent, years);        // •••
  80. }
  81.  
  82. //---------------------------------------------------------------------------------------
  83. SOM_Scope double  SOMLINK 
  84. FINANLoanAmount(DevUniv_SFinance *somSelf, Environment *ev,
  85.         double monthlyPayment,
  86.         double annualInterestPercent,
  87.         double years)
  88. {
  89.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANLoanAmount");
  90.     return ::LoanAmount(monthlyPayment, annualInterestPercent, years);         // •••
  91. }
  92.  
  93. //---------------------------------------------------------------------------------------
  94. SOM_Scope double  SOMLINK 
  95. FINANLoanMonths(DevUniv_SFinance *somSelf, Environment *ev,
  96.         double amountBorrowed,
  97.         double monthlyPayment,
  98.         double annualInterestPercent)
  99. {
  100.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANLoanMonths");
  101.     return ::LoanMonths(amountBorrowed, monthlyPayment, annualInterestPercent);    // •••
  102. }
  103.  
  104. //---------------------------------------------------------------------------------------
  105. SOM_Scope double  SOMLINK 
  106. FINANInterestRate(DevUniv_SFinance *somSelf, Environment *ev,
  107.         double amountBorrowed,
  108.         double monthlyPayment,
  109.         double years)
  110. {
  111.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANInterestRate");
  112.     return ::InterestRate(amountBorrowed, monthlyPayment, years);    // •••
  113. }
  114.  
  115. //---------------------------------------------------------------------------------------
  116. /*
  117.  * 
  118.  */
  119.  
  120. SOM_Scope double  SOMLINK 
  121. FINANBalloonPayment(DevUniv_SFinance *somSelf, Environment *ev,
  122.         double amountBorrowed,
  123.         double monthlyPayment,
  124.         double annualInterestPercent,
  125.         double years)
  126. {
  127.     DevUniv_SFinanceMethodDebug("DevUniv_SFinance","FINANBalloonPayment");
  128.     return ::BalloonPayment(amountBorrowed, monthlyPayment, 
  129.                                 annualInterestPercent, years);    // •••
  130. }
  131.